From 1a40d27fa251a6e805355d7f73093155b8e33057 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Thu, 13 May 1993 00:21:23 +0000 Subject: [PATCH] (make_lispy_event): Don't set shift modifier for C-^. --- src/keyboard.c | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/src/keyboard.c b/src/keyboard.c index 3e8a522a073..09305ff1451 100644 --- a/src/keyboard.c +++ b/src/keyboard.c @@ -2093,7 +2093,10 @@ make_lispy_event (event) if ((event->modifiers & ctrl_modifier) && c >= 040) c |= ctrl_modifier; - if (XFASTINT (event->code) < 040 + /* Set the shift modifier for a control char + made from a shifted letter. But only for letters! */ + if (XFASTINT (event->code) >= 'A' - 0100 + && XFASTINT (event->code) <= 'Z' - 0100 && (event->modifiers & shift_modifier)) c |= shift_modifier; c |= (event->modifiers -- 2.30.2